home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 2 / AACD 2.iso / AACD / Programming / fpc / compiler / cgi3862.pas < prev    next >
Pascal/Delphi Source File  |  1998-09-24  |  2KB  |  59 lines

  1. {
  2.     $Id: cgi3862.pas,v 1.1.1.1 1998/03/25 11:18:12 root Exp $
  3.     Copyright (c) 1993-98 by Florian Klaempfl
  4.  
  5.     This unit generates i386 (or better) assembler from the parse tree
  6.  
  7.     This program is free software; you can redistribute it and/or modify
  8.     it under the terms of the GNU General Public License as published by
  9.     the Free Software Foundation; either version 2 of the License, or
  10.     (at your option) any later version.
  11.  
  12.     This program is distributed in the hope that it will be useful,
  13.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.     GNU General Public License for more details.
  16.  
  17.     You should have received a copy of the GNU General Public License
  18.     along with this program; if not, write to the Free Software
  19.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20.  
  21.  ****************************************************************************
  22. }
  23. {$ifdef tp}
  24.   {$E+,F+,N+,D+,L+,Y+}
  25. {$endif}
  26. unit cgi3862;
  27.  
  28.   interface
  29.  
  30.     uses
  31.        objects,verbose,cobjects,systems,globals,tree,
  32.        symtable,types,strings,pass_1,hcodegen,
  33.        aasm,i386,tgeni386,files,cgai386;
  34.  
  35.     procedure secondadd(var p : ptree);
  36.     procedure secondaddstring(var p : ptree);
  37.     procedure secondas(var p : ptree);
  38.     procedure secondis(var p : ptree);
  39.     procedure secondloadvmt(var p : ptree);
  40.  
  41.   implementation
  42.  
  43.     uses
  44.        cgi386;
  45.  
  46. {$I cgi386ad.inc}
  47.  
  48. end.
  49. {
  50.   $Log: cgi3862.pas,v $
  51.   Revision 1.1.1.1  1998/03/25 11:18:12  root
  52.   * Restored version
  53.  
  54.   Revision 1.9  1998/03/10 01:17:18  peter
  55.     * all files have the same header
  56.     * messages are fully implemented, EXTDEBUG uses Comment()
  57.     + AG... files for the Assembler generation
  58.  
  59. }